home *** CD-ROM | disk | FTP | other *** search
/ PC World Komputer 2007 December / PCWKCD1207B.iso / Windows marzen / Macro ToolsWorks 6.31 / tworks.exe / Samples / Shows how to use menus.mcr < prev    next >
Text File  |  2003-06-12  |  757b  |  31 lines
  1. <#> 
  2. <#> Sample: Shows how to use menus
  3. <#> 
  4. <cmds>
  5.  
  6. <msg>(100,100,"What color do you like?","Message",0)
  7.  
  8. <menu_additem>("Red")
  9. <menu_additem>("Blue")
  10. <menu_additem>("White")
  11. <menu_additem>("---")
  12. <menu_additem>(".Other")
  13. <menu_additem>(".Green")
  14. <menu_additem>(".Black")
  15. <menu_additem>(".Yellow")
  16. <menu_additem>("..Yet another")
  17. <menu_additem>("..Tell me what?")
  18. <menu_additem>(".")
  19. <menu_additem>(".")
  20. <menu_additem>("---")
  21. <menu_additem>("I do not like colors")
  22.  
  23. <menu_show>(-1,-1,vSelectedItem,1,0)
  24.  
  25. <msgoff>
  26.  
  27. <#> Remove leading . characters in a case the selected item is from submenu
  28. <var_oper>(vSelectedItem,"%vSelectedItem%",STR_TRIMLEFT,".","", "0")
  29.  
  30. <msg>(-100,-100,"You have selected: %vSelectedItem%","Message",1)
  31.